home *** CD-ROM | disk | FTP | other *** search
/ Gekikoh Dennoh Club 2 / Gekikoh Dennoh Club Vol. 2 (Japan).7z / Gekikoh Dennoh Club Vol. 2 (Japan) (Track 01).bin / tools / psmed / psmed01.lzh / source / psmed.c < prev    next >
C/C++ Source or Header  |  1997-09-04  |  18KB  |  949 lines
  1. /*######################################
  2.  * X68 Human68k
  3.  *  psmed:汎用ＰＳＭデータエディタ
  4.  *
  5.  *  psmed.c メインモジュール
  6.  *
  7.  *                     by ＢＬＡＣＫ．
  8.  *######################################
  9.  */
  10. #include <stdio.h>
  11. #include <stdlib.h>
  12. #include <string.h>
  13. #include <conio.h>
  14. #include <io.h>
  15. #include <errno.h>
  16. #include <process.h>
  17. #include <doslib.h>
  18. #define GLOBAL_MEM
  19. #include "psmed.h"
  20.  
  21. #define VER 0.1
  22.  
  23. #define PAGETITLE_X 0    /* ページタイトル表示位置 */
  24. #define PAGETITLE_Y 2
  25. #define EDIT_X 0        /* 編集リスト表示位置 */
  26. #define EDIT_Y 4
  27. #define ITEMEDIT_X 0    /* アイテム編集表示位置 */
  28. #define ITEMEDIT_Y 30
  29. #define PAGE_X 80        /* ページ表示位置 */
  30. #define PAGE_Y 0
  31. #define PROTECT_X 60    /* 書き込み禁止表示位置 */
  32. #define PROTECT_Y 0
  33.  
  34. /*━━━━━━━━━━━━━━━━━━━━━━*/
  35.  
  36. static int block_num;                        /* 編集ＰＳＭファイルのブロック長 */
  37.  
  38. static unsigned char headerbuf[BLOCK_MAX][HEADER_LEN];        /* ＰＳＭブロックヘッダ保存 */
  39. static unsigned char psmbuf[BLOCK_LEN*BLOCK_MAX];            /* ブロックデータ内容 */
  40.  
  41. static char fnk[6] = "";                    /* CLRキー定義内容退避 */
  42.  
  43. /*━━━━━━━━━━━━━━━━━━━━━━*/
  44.  
  45. void help(void);
  46. void init(void);
  47. void tini(void);
  48. edit_t *pagetolist(int page);
  49. void screen_init(void);
  50. static void pagedisp(int page);
  51. static void page_item_disp(int no);
  52. void edit(void);
  53. void edit_item(int no);
  54. void edit_item_n(int no);
  55. static void item_mark(int no);
  56. static void make_ped_filename(char *out,const char *flnm);
  57. static void search_ped(char *out,const char *flnm);
  58.  
  59. /*━━━━━━━━━━━━━━━━━━━━━━*/
  60.  
  61. /**********************
  62.  * main
  63.  *
  64.  *
  65.  **********************
  66.  */
  67. int main(int argc,char *argv[])
  68. {
  69.     int f_count;        /* コマンドオプション パス名取得用 */
  70.     FILE *fp;
  71.     int i;
  72.     char drv[4];
  73.     char path[FILENAME_MAX];
  74.     char ext[4];
  75.     char bak_filename[FILENAME_MAX];
  76.     size_t len;
  77.     int opt_b = FALSE;
  78.     int msg_f = FALSE;
  79.     enum e_no_tag{
  80.         e_nomsg,
  81.         e_noexec,
  82.         e_execfailure,
  83.         e_execnomem,
  84.     }msg_no = e_nomsg;
  85.     char flnm1[FILENAME_MAX];
  86.     char flnm2[FILENAME_MAX];
  87.  
  88.     init();
  89.     atexit(tini);
  90.  
  91.     /*=== コマンドオプション処理 ===*/
  92.     if (argc <= 1){
  93.         help();
  94.         return EXIT_FAILURE;
  95.     }
  96.  
  97.     strsfn(argv[0],drv,path,NULL,NULL);
  98.     strcpy(base_path,drv);
  99.     strcat(base_path,path);
  100.  
  101.     f_count = 0;
  102.     for (i = 1;i < argc;i++){
  103.         if (argv[i][0] == '-' || argv[i][0] == '/'){
  104.             /* オプションスイッチ処理 */
  105.             switch (argv[i][1]){
  106.                 case '?':
  107.                     /* Help */
  108.                     help();
  109.                     return EXIT_FAILURE;
  110.                 case 'b':
  111.                 case 'B':
  112.                     opt_b = TRUE;
  113.                     break;
  114.                 case 'v':
  115.                 case 'V':
  116.                     write_protect = TRUE;
  117.                     break;
  118.                 default:
  119.                     /* それ以外は無視 */
  120.                     break;
  121.             }
  122.         }else{
  123.             /* パス名処理 */
  124.             switch (f_count){
  125.                 case 0:
  126.                     strcpy(flnm1,argv[i]);
  127.                     break;
  128.                 case 1:
  129.                     strcpy(flnm2,argv[i]);
  130.                     break;
  131.                 default:
  132.                     /* 受け取り数以降は無視 */
  133.                     break;
  134.             }
  135.             f_count++;
  136.         }
  137.     }
  138.  
  139.     switch (f_count){
  140.         case 1:
  141.             search_ped(flnm2,flnm1);
  142.             if (strlen(flnm2) == 0){
  143.                 puts("編集情報検索に失敗しました。");
  144.                 return EXIT_FAILURE;
  145.             }
  146.             make_ped_filename(cnf_filename,flnm2);
  147.             if (!cnf_read(cnf_filename)){
  148.                 puts("編集情報取り込みに失敗しました。");
  149.                 return EXIT_FAILURE;
  150.             }
  151.             strcpy(filename,flnm1);
  152.         case 2:
  153.             make_ped_filename(cnf_filename,flnm1);
  154.             if (!cnf_read(cnf_filename)){
  155.                 puts("編集情報取り込みに失敗しました。");
  156.                 return EXIT_FAILURE;
  157.             }
  158.             strcpy(filename,flnm2);
  159.             break;
  160.         default:
  161.             help();
  162.             return EXIT_FAILURE;
  163.     }
  164.  
  165.     if (opt_b){
  166.         cnfoption_b = TRUE;    /* バックアップ無し */
  167.         /* コマンドオプションが優先する */
  168.     }
  169.  
  170.     /*=== ＰＳＭデータ読み込み ===*/
  171.     stcgfe(ext,filename);
  172.     if (strcmpi(ext,"psm")){
  173.         puts("このファイルはＰＳＭファイルではありません。");
  174.         return EXIT_FAILURE;
  175.     }
  176.  
  177.     /* バッファへファイル取り込み */
  178.     fp = fopen(filename,"r+b");
  179.     if (!fp){
  180.         puts("ファイルのオープンに失敗しました。");
  181.         return EXIT_FAILURE;
  182.     }
  183.  
  184.     block_num = filelength(fileno(fp)) / (HEADER_LEN+BLOCK_LEN);
  185.  
  186.     for (i=0;i<block_num;i++){
  187.         fread(headerbuf[i],sizeof(char),HEADER_LEN,fp);
  188.         fread(psmbuf+i*BLOCK_LEN,sizeof(char),BLOCK_LEN,fp);
  189.     }
  190.     fclose(fp);
  191.  
  192.     if (strncmp(headerbuf[0]+12,psm_id,strlen(psm_id))){
  193.         puts("編集情報とＰＳＭファイルで対象が違っています。");
  194.         return EXIT_FAILURE;
  195.     }
  196.  
  197.     /*=== 編集 ===*/
  198.     screen_init();
  199.     edit();
  200.  
  201.     /*=== ＰＳＭデータ保存 ===*/
  202.     if (psm_edited && !write_protect){
  203.         if (!cnfoption_b){
  204.             strmfe(bak_filename,filename,"bak");
  205.             if (rename(filename,bak_filename) < 0){
  206.                 remove(bak_filename);
  207.                 rename(filename,bak_filename);
  208.             }
  209.         }
  210.         fp = fopen(filename,"wb");
  211.         for (i=0;i<block_num;i++){
  212.             len = fwrite(headerbuf[i],sizeof(char),HEADER_LEN,fp);
  213.             if (len != HEADER_LEN){
  214.                 puts("書き込み容量エラー");
  215.                 break;
  216.             }
  217.             len = fwrite(psmbuf+i*BLOCK_LEN,sizeof(char),BLOCK_LEN,fp);
  218.             if (len != BLOCK_LEN){
  219.                 puts("書き込み容量エラー");
  220.                 break;
  221.             }
  222.         }
  223.         fclose(fp);
  224.  
  225.         if (c_prog_argv[0]){
  226.             if (execvp(c_prog_argv[0],c_prog_argv) == -1){
  227.                 switch (errno){
  228.                     case ENOMEM:    msg_no = e_execnomem;    break;
  229.                     default:        msg_no = e_execfailure;    break;
  230.                 }
  231.                 msg_f = TRUE;
  232.             }else{
  233.                 msg_f = FALSE;
  234.             }
  235.         }else{
  236.             msg_f = TRUE;
  237.             msg_no = e_noexec;
  238.         }
  239.     }
  240.  
  241.     C_FNKMOD(0);
  242.     C_CLS_AL();
  243.  
  244.     if (msg_f){
  245.         switch (msg_no){
  246.             case e_noexec:
  247.                 puts("警告：チェックサム補正プログラムが定義されていません。");
  248.                 break;
  249.             case e_execnomem:
  250.                 puts("メモリーエラーでチェックサム補正プログラム実行が出来ませんでした。");
  251.                 break;
  252.             case e_execfailure:
  253.                 puts("チェックサム補正プログラム実行が出来ませんでした。");
  254.                 break;
  255.             default:
  256.                 break;
  257.         }
  258.     }
  259.  
  260.     return EXIT_SUCCESS;
  261. }
  262.  
  263.  
  264. /********************
  265.  * init
  266.  * 初期化処理
  267.  *
  268.  ********************
  269.  */
  270. void init(void)
  271. {
  272.     int i;
  273.  
  274.     editlist = NULL;
  275.     editlistlast = NULL;
  276.     listnum = 0;
  277.  
  278.     cnfoption_a = FALSE;
  279.     cnfoption_b = FALSE;
  280.  
  281.     psm_edited = FALSE;
  282.     write_protect = FALSE;
  283.  
  284.     for (i=0;i<MENU_MAX;i++){
  285.         menu[i] = NULL;
  286.         menu_item_num[i] = 0;
  287.         menu_items[i] = NULL;
  288.         menu_items_num[i] = 0;
  289.     }
  290. }
  291.  
  292.  
  293. /********************
  294.  * tini
  295.  * 終了処理
  296.  *
  297.  ********************
  298.  * atexit()によって登録されるから終了時は必ず実行される
  299.  */
  300. void tini(void)
  301. {
  302.     edit_t *item;
  303.     edit_t *next;
  304.     int i;
  305.  
  306.     /* 編集リストの解放 */
  307.     if (editlist){
  308.         item = editlist;
  309.         do{
  310.             next = item->next;
  311.             free(item);
  312.             item = next;
  313.         }while (next != NULL);
  314.     }
  315.  
  316.     /* メニューの解放 */
  317.     for (i=0;i<MENU_MAX;i++){
  318.         free(menu[i]);
  319.     }
  320.  
  321.     /* ファンクションキーを戻す */
  322.     if (fnk[0]){
  323.         FNCKEYST(f_clr,fnk);
  324.     }
  325.  
  326.     C_CURON();
  327. }
  328.  
  329.  
  330. /***********************
  331.  * help
  332.  *
  333.  *
  334.  ***********************
  335.  * ヘルプ処理はちゃんとしないとな。うむ。
  336.  */
  337. void help(void)
  338. {
  339.     printf("psmed v%.1f by ＢＬＡＣＫ．\n",VER);
  340.     puts("編集情報(*.ped)でＰＳＭファイルを編集出来ます。");
  341.     puts("Ex.>psmed [option] <*.ped> <*.psm>");
  342.     puts("option");
  343.     puts(" -b バックアップファイルを作成しない");
  344.     puts(" -v 書き込み禁止");
  345. }
  346.  
  347.  
  348. /***************************
  349.  * screen_init
  350.  * 画面初期化
  351.  *
  352.  ***************************
  353.  * ＳＸのコンソールウィンドウでも実行可能な様に
  354.  * コンソールだけで画面を構成する方針である。
  355.  * エスケープシーケンスの強調が使えなかったような気もするが・・・
  356.  */
  357. void screen_init(void)
  358. {
  359.     int i;
  360.  
  361.     C_FNKMOD(3);
  362.     C_CLS_AL();
  363.     C_CUROFF();
  364.  
  365.     FNCKEYGT(f_clr,fnk);
  366.     FNCKEYST(f_clr,"\033E");    /* CLRをVOIDに割り当てる */
  367.  
  368.     C_LOCATE(0,0);
  369.     printf("PSMED Ver%.1f  Edit:%s",VER,headerbuf[0]+12);
  370.  
  371.     C_LOCATE(0,1);
  372.     printf("%s",psmbuf+4);
  373.  
  374.     if (write_protect){
  375.         C_LOCATE(PROTECT_X,PROTECT_Y);
  376.         fputs("\x1b[36m書込禁止\x1b[m",stdout);
  377.     }
  378.  
  379.     C_LOCATE(0,EDIT_Y-1);
  380.     fputs("\x1b[37m",stdout);
  381.     for (i=0;i<48;i++){
  382.         fputs("￣",stdout);
  383.     }
  384.     fputs("\x1b[m",stdout);
  385.  
  386.     C_LOCATE(0,EDIT_Y+PAGE_ITEM_MAX);
  387.     for (i=0;i<48;i++){
  388.         fputs("─",stdout);
  389.     }
  390.  
  391.     pagedisp(0);
  392. }
  393.  
  394.  
  395. /***************************
  396.  * pagedisp
  397.  * ページ番号からページ表示
  398.  *
  399.  ***************************
  400.  * 内部でpageedit[]を作っているのは一見無駄に見えるかも知らんが
  401.  * 編集コマンドの分だけを集めたリストを別に作った方が便利なんだね。
  402.  * ページとアイテム番号からリスト内をその都度検索するより。
  403.  */
  404. static void pagedisp(int page)
  405. {
  406.     edit_t *rec;
  407.     int i,j;
  408.     int pagetitle = FALSE;
  409.  
  410.     /* ページリストと画面のページ内容初期化 */
  411.     for (i=0;i<PAGE_ITEM_MAX;i++){
  412.         pageedit[i] = NULL;
  413.         C_LOCATE(EDIT_X,EDIT_Y+i);
  414.         C_ERA_AL();
  415.     }
  416.  
  417.     C_LOCATE(PAGE_X,PAGE_Y);
  418.     printf("Page:%3d/%3d",page + 1,editlistlast->page + 1);
  419.  
  420.     /* 項目名 */
  421.     rec = pagetolist(page);
  422.     for (i=0,j=0;i<PAGE_ITEM_MAX;i++){
  423.         if (rec->page != page){
  424.             break;
  425.         }
  426.         switch (rec->cmd){
  427.             case c_pagetitle:
  428.                 C_LOCATE(PAGETITLE_X,PAGETITLE_Y);
  429.                 printf("\x1b[37m／\x1b[35m%s\x1b[37m＼\x1b[m",rec->name);
  430.                 C_ERA_ED();
  431.                 pagetitle = TRUE;
  432.                 break;
  433.             case c_edit_b:
  434.             case c_edit_w:
  435.             case c_edit_l:
  436.             case c_edit_s:
  437.             case c_menu_b:
  438.             case c_menu_w:
  439.             case c_menu_l:
  440.                 pageedit[j] = rec;    /* 登録するのは編集コマンドのみ */
  441.                 j++;
  442.                 C_LOCATE(EDIT_X,EDIT_Y+rec->item);
  443.                 fputs(rec->name,stdout);
  444.                 break;
  445.             case c_title:
  446.                 C_LOCATE(EDIT_X,EDIT_Y+rec->item);
  447.                 printf("\x1b[31m%s\x1b[m",rec->name);
  448.                 break;
  449.         }
  450.         rec = rec->next;
  451.         if (!rec){
  452.             break;
  453.         }
  454.     }
  455.  
  456.     if (!pagetitle){
  457.         C_LOCATE(PAGETITLE_X,PAGETITLE_Y);
  458.         fputs("\x1b[37m／￣￣￣￣＼\x1b[m",stdout);
  459.         C_ERA_ED();
  460.     }
  461.  
  462.     /* 項目内容 */
  463.     for (i=0;i<PAGE_ITEM_MAX;i++){
  464.         page_item_disp(i);
  465.     }
  466.     item_mark(-1);
  467. }
  468.  
  469.  
  470. /***************************
  471.  * page_item_disp
  472.  * ページ内アイテム番号から内容表示
  473.  *
  474.  ***************************
  475.  */
  476. static void page_item_disp(int no)
  477. {
  478.     edit_t *rec;
  479.  
  480.     if (!pageedit[no]){
  481.         return;
  482.     }
  483.     rec = pageedit[no];
  484.     C_LOCATE(EDIT_X+ITEM_NAME_LEN,EDIT_Y+rec->item);
  485.     switch (rec->cmd){
  486.         case c_edit_b:
  487.             printf("%12u",bufget(rec->adr,1));
  488.             break;
  489.         case c_edit_w:
  490.             printf("%12u",bufget(rec->adr,2));
  491.             break;
  492.         case c_edit_l:
  493.             printf("%12u",bufget(rec->adr,4));
  494.             break;
  495.         case c_edit_s:
  496.             printf("%-*s",rec->size,psmbuf + rec->adr);
  497.             break;
  498.         case c_menu_b:
  499.             if (menu[rec->size]){
  500.                 printf("%-*s",MENU_ITEM_NAME_LEN,menu[rec->size]+MENU_ITEM_NAME_LEN*bufget(rec->adr,1));
  501.             }
  502.             break;
  503.         case c_menu_w:
  504.             if (menu[rec->size]){
  505.                 printf("%-*s",MENU_ITEM_NAME_LEN,menu[rec->size]+MENU_ITEM_NAME_LEN*bufget(rec->adr,2));
  506.             }
  507.             break;
  508.         case c_menu_l:
  509.             if (menu[rec->size]){
  510.                 printf("%-*s",MENU_ITEM_NAME_LEN,menu[rec->size]+MENU_ITEM_NAME_LEN*bufget(rec->adr,4));
  511.             }
  512.             break;
  513.         default:
  514.             break;
  515.     }
  516. }
  517.  
  518.  
  519. /***************************
  520.  * edit
  521.  * 編集処理
  522.  *
  523.  ***************************
  524.  */
  525. void edit(void)
  526. {
  527.     int loop_f = TRUE;
  528.     int key;
  529.     int page = 0;
  530.     int item = 0;
  531.  
  532.     while (loop_f){
  533.         key = inkey();
  534.         switch (key){
  535.             case ESC:
  536.                 loop_f = FALSE;
  537.                 break;
  538.             case ROLL_UP:
  539.                 page++;
  540.                 if (page > editlistlast->page){
  541.                     page = editlistlast->page;
  542.                     break;
  543.                 }
  544.                 item = 0;
  545.                 pagedisp(page);
  546.                 break;
  547.             case ROLL_DOWN:
  548.                 page--;
  549.                 if (page < 0){
  550.                     page = 0;
  551.                     break;
  552.                 }
  553.                 item = 0;
  554.                 pagedisp(page);
  555.                 break;
  556.             case UP:
  557.                 item--;
  558.                 if (item < 0){
  559.                     item = 0;
  560.                     break;
  561.                 }
  562.                 item_mark(item);
  563.                 break;
  564.             case DOWN:
  565.                 item++;
  566.                 if (item >= PAGE_ITEM_MAX || pageedit[item] == NULL){
  567.                     item--;
  568.                     break;
  569.                 }
  570.                 item_mark(item);
  571.                 break;
  572.             case CR:
  573.                 if (!write_protect){
  574.                     edit_item(item);
  575.                     switch (pageedit[item]->cmd){
  576.                         case c_menu_b:
  577.                         case c_menu_w:
  578.                         case c_menu_l:
  579.                             pagedisp(page);        /* メニューの時は画面描き直し */
  580.                             break;
  581.                         default:
  582.                             break;
  583.                     }
  584.                 }
  585.                 break;
  586.             case 'v':
  587.             case 'V':
  588.                 write_protect = TRUE;
  589.                 C_LOCATE(PROTECT_X,PROTECT_Y);
  590.                 fputs("\x1b[36m書込禁止\x1b[m",stdout);
  591.                 break;
  592.             default:
  593.                 break;
  594.         }
  595.     }
  596. }
  597.  
  598.  
  599. /**********************
  600.  * item_edit
  601.  * 項目編集
  602.  *
  603.  **********************
  604.  */
  605. void edit_item(int no)
  606. {
  607.     switch (pageedit[no]->cmd){
  608.         case c_edit_b:
  609.         case c_edit_w:
  610.         case c_edit_l:
  611.         case c_edit_s:
  612.             edit_item_n(no);
  613.             break;
  614.         case c_menu_b:
  615.         case c_menu_w:
  616.         case c_menu_l:
  617.             edit_item_m(no);
  618.             break;
  619.         default:
  620.             break;
  621.     }
  622. }
  623.  
  624.  
  625. /**********************
  626.  * item_edit
  627.  * 数値項目編集
  628.  *
  629.  **********************
  630.  */
  631. void edit_item_n(int no)
  632. {
  633.     struct INPPTR instr;
  634.  
  635.     instr.max = STR_BUFFER_LEN;
  636.  
  637.     C_CURON();
  638.     C_LOCATE(ITEMEDIT_X,ITEMEDIT_Y);
  639.  
  640.     fputs("Input:",stdout);
  641.     GETSS(&instr);    /* History.x 機能が使えるから文字列入力はＤＯＳコールを使おうぜぇ */
  642.                     /* 同じ手抜きでもfgets()とかを使う位ならね。ファイル名補完機能も有るんじゃけん */
  643.  
  644.     C_LOCATE(ITEMEDIT_X,ITEMEDIT_Y);
  645.     C_ERA_ED();
  646.     C_CUROFF();
  647.  
  648.     if (instr.length == 0){
  649.         return;
  650.     }
  651.  
  652.     switch (pageedit[no]->cmd){
  653.         case c_edit_b:
  654.             bufset(pageedit[no]->adr,1,strtol2(instr.buffer));
  655.             psm_edited = TRUE;
  656.             break;
  657.         case c_edit_w:
  658.             bufset(pageedit[no]->adr,2,strtol2(instr.buffer));
  659.             psm_edited = TRUE;
  660.             break;
  661.         case c_edit_l:
  662.             bufset(pageedit[no]->adr,4,strtol2(instr.buffer));
  663.             psm_edited = TRUE;
  664.             break;
  665.         case c_edit_s:
  666.             strncpy(psmbuf+pageedit[no]->adr,instr.buffer,pageedit[no]->size);
  667.             psmbuf[pageedit[no]->adr + pageedit[no]->size - 1] = '\0';
  668.             psm_edited = TRUE;
  669.             break;
  670.         default:
  671.             break;
  672.     }
  673.     page_item_disp(no);
  674. }
  675.  
  676.  
  677. /**********************
  678.  * item_mark
  679.  * 項目に選択用カラーを付ける。
  680.  *
  681.  **********************
  682.  */
  683. static void item_mark(int no)
  684. {
  685.     static int old;
  686.     edit_t *rec;
  687.  
  688.     if (no < 0){
  689.         /* 初期化用 */
  690.         old = 0;
  691.         rec = pageedit[0];
  692.         C_LOCATE(EDIT_X,EDIT_Y+rec->item);
  693.         printf("\x1b[41m%-*s\x1b[m",ITEM_NAME_LEN-1,rec->name);
  694.         return;
  695.     }
  696.  
  697.     if (old == no){
  698.         return;        /* マークは移動していない */
  699.     }
  700.  
  701.     rec = pageedit[no];
  702.     C_LOCATE(EDIT_X,EDIT_Y+rec->item);
  703.     printf("\x1b[41m%-*s\x1b[m",ITEM_NAME_LEN-1,rec->name);
  704.  
  705.     rec = pageedit[old];
  706.     C_LOCATE(EDIT_X,EDIT_Y+rec->item);
  707.     printf("\x1b[m%-*s",ITEM_NAME_LEN-1,rec->name);
  708.  
  709.     old = no;
  710. }
  711.  
  712.  
  713. /***************************
  714.  * pagetolist
  715.  * ページ番号から編集リストの先頭を得る
  716.  *
  717.  * out:リストのポインタ
  718.  ***************************
  719.  */
  720. edit_t *pagetolist(int page)
  721. {
  722.     edit_t *rec;
  723.  
  724.     if (page == 0){
  725.         return editlist;
  726.     }
  727.  
  728.     rec = editlist;
  729.     while (rec->page != page){
  730.         rec = rec->next;
  731.         if (rec == NULL){
  732.             rec = editlist;
  733.             break;
  734.         }
  735.     }
  736.     return rec;
  737. }
  738.  
  739.  
  740. /***************************
  741.  * bufget
  742.  * ＰＳＭデータバッファからデータを得る
  743.  *
  744.  * in adr=アドレス size=データサイズ
  745.  ***************************
  746.  * ＰＳはスモールエンディアン
  747.  */
  748. int bufget(int adr,int size)
  749. {
  750.     int d = 0;
  751.  
  752.     switch (size){
  753.         case 1:
  754.             d = psmbuf[adr];
  755.             break;
  756.         case 2:
  757.             d = psmbuf[adr];
  758.             d += psmbuf[adr+1]*0x100;
  759.             break;
  760.         case 4:
  761.             d = psmbuf[adr];
  762.             d += psmbuf[adr+1]*0x100;
  763.             d += psmbuf[adr+2]*0x10000;
  764.             d += psmbuf[adr+3]*0x1000000;
  765.             break;
  766.     }
  767.     return d;
  768. }
  769.  
  770.  
  771. /***************************
  772.  * bufset
  773.  * ＰＳＭデータバッファにデータを設定
  774.  *
  775.  * in adr=アドレス size=データサイズ data=設定値
  776.  ***************************
  777.  * ＰＳはスモールエンディアン
  778.  */
  779. void bufset(int adr,int size,int data)
  780. {
  781.     switch (size){
  782.         case 1:
  783.             psmbuf[adr] = data;
  784.             break;
  785.         case 2:
  786.             psmbuf[adr] = data % 0x100;
  787.             psmbuf[adr+1] = data / 0x100;
  788.             break;
  789.         case 4:
  790.             psmbuf[adr] = data & 0xff;
  791.             psmbuf[adr+1] = data >> 8 & 0xff;
  792.             psmbuf[adr+2] = data >> 16 & 0xff;
  793.             psmbuf[adr+3] = data >> 24 & 0xff;
  794.             break;
  795.     }
  796. }
  797.  
  798.  
  799. /**********************
  800.  * inkey
  801.  * キー入力
  802.  *
  803.  **********************
  804.  */
  805. int inkey(void)
  806. {
  807.     int key;
  808.  
  809.     key = K_KEYBIT(7);    /* ＤＯＳコールの方を使おうぜぇ */
  810.     if (key & 0x01){
  811.         key = ROLL_UP;
  812.     }else if (key & 0x02){
  813.         key = ROLL_DOWN;
  814.     }else if (key & 0x08){
  815.         key = LEFT;
  816.     }else if (key & 0x10){
  817.         key = UP;
  818.     }else if (key & 0x20){
  819.         key = RIGHT;
  820.     }else if (key & 0x40){
  821.         key = DOWN;
  822.     }else{
  823.         return getch();
  824.     }
  825.     while (K_KEYBIT(7));
  826.     return key;
  827. }
  828.  
  829.  
  830. /***************************
  831.  * strtol2
  832.  * 文字列を数値変換（１６進数＄表記対応）
  833.  *
  834.  * out:値
  835.  ***************************
  836.  */
  837. int strtol2(const char *str)
  838. {
  839.     char str2[32];
  840.     int d;
  841.  
  842.     if (str[0] == '$'){        /* １６進接頭文字 */
  843.         if (strlen(str)+3 > sizeof(str2)){
  844.             return 0;    /* 変換失敗 */
  845.         }
  846.         strcpy(str2,"0x");
  847.         strcat(str2,str+1);
  848.         d = strtol(str2,NULL,0);
  849.     }else{
  850.         d = strtol(str,NULL,0);
  851.     }
  852.     return d;
  853. }
  854.  
  855.  
  856. /**************************
  857.  * xmalloc
  858.  * 自動ヒープ拡張付きmalloc
  859.  *
  860.  *
  861.  **************************
  862.  * ＸＣライブラリのmalloc()はヒープを拡張しないので
  863.  */
  864. void *xmalloc(size_t size)
  865. {
  866.     void *buf;
  867.  
  868.     if (size <= 0) return NULL;
  869.  
  870.     buf = malloc(size);
  871.     if (buf == NULL){
  872.         if (sbrk(size) == (void*)-1){
  873.             errno = ENOMEM;
  874.             return NULL;
  875.         }
  876.         buf = malloc(size);
  877.         if (buf == NULL){
  878.             errno = ENOMEM;
  879.             return NULL;
  880.         }
  881.     }
  882.     return buf;
  883. }
  884.  
  885.  
  886. /***************************
  887.  * make_ped_filename
  888.  * 編集情報ファイル名作成
  889.  *
  890.  ***************************
  891.  */
  892. static void make_ped_filename(char *out,const char *flnm)
  893. {
  894.     FILE *fp;
  895.     char drv[4];
  896.     char path[FILENAME_MAX];
  897.     char node[20];
  898.     char ext[4];
  899.  
  900.     strsfn(flnm,drv,path,node,ext);
  901.  
  902.     fp = fopen(flnm,"r");
  903.     if (!fp){
  904.         /* 見つからなかったら実行ファイルのパスを格納 */
  905.         strcpy(out,base_path);
  906.         strcat(out,"\\");
  907.         strcat(out,node);
  908.         strcat(out,".");
  909.         if (strlen(ext) == 0){
  910.             strcat(out,"ped");    /* 拡張子補完 */
  911.         }else{
  912.             strcat(out,ext);
  913.         }
  914.     }else{
  915.         fclose(fp);
  916.         strcpy(out,flnm);
  917.         if (strlen(ext) == 0){
  918.             strcat(out,".ped");    /* 拡張子補完 */
  919.         }
  920.     }
  921. }
  922.  
  923.  
  924. /***************************
  925.  * search_ped
  926.  * 編集情報ファイル名検索
  927.  *
  928.  ***************************
  929.  * 工事中
  930.  */
  931. static void search_ped(char *out,const char *flnm)
  932. {
  933.     char id[32];
  934.     FILE *fp;
  935.  
  936.     fp = fopen(flnm,"rb");
  937.     if (!fp){
  938.         out[0] = '\0';
  939.         return;
  940.     }
  941.     fseek(fp,12,SEEK_SET);
  942.     fgets(id,sizeof id,fp);
  943.     fclose(fp);
  944.  
  945.     out[0] = '\0';
  946. }
  947.  
  948.  
  949.